home *** CD-ROM | disk | FTP | other *** search
- # -----------------------------------------------------------
- # Manoever fuer Raketen:
- # einfacher Zielanflug
- #
- # ⌐ radon labs gmbh
- #
- # 18-Aug-00 af created
- # 18-Aug-00 Don Lorenzo heiratet heute
- # ------------------------------------------------------------
-
- # eine Root fuer Anflugmanoever
- new nroot guidedmissile/goto
- sel guidedmissile/goto
-
- # einfaches Anfliegen
- new ncommandlist follow
- follow.setadjusttype reach
- follow.settestcommand gmgfollow_test
- follow.addcommand true 0 0 -10000 false 0 0 0 nothing 0.5
-
- proc gmgfollow_test {} { return 1.0 }
-
- sel ..
- sel ..
-
-